home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Die Speccy' 97
/
Die Speccy' 97.iso
/
amiga_system
/
the_aminet
/
comm
/
mail
/
netmail_13.lha
/
NetMail
/
Drivers
/
LocalEcho.editor
< prev
next >
Wrap
Text File
|
1995-07-28
|
457b
|
31 lines
/*
** $VER: LocalEcho.editor 1.0 (25.5.95)
** Copyright (c) 1995 Riccardo Solmi
**
*/
OPTIONS RESULTS
OPTIONS FAILAT 21
SELECT
WHEN UPPER(ARG(1)) = 'EDIT' THEN DO
PARSE ARG , file, port
echo 'EDIT "'file'", "'port'"'
END
WHEN UPPER(ARG(1)) = 'SAVE' THEN DO
PARSE ARG , port
echo 'SAVE "'port'"'
END
WHEN UPPER(ARG(1)) = 'CLOSE' THEN DO
PARSE ARG , port
echo 'CLOSE "'port'"'
END
END
RETURN port